-- card: 7615 from stack: in
-- bmap block id: 6628
-- flags: 0000
-- background id: 2729
-- name: 
----- HyperTalk script -----
on opencard
  hide bkgnd button next
  play "dawn chorus"
  repeat while the sound is not "done"
  end repeat
end opencard

on closecard
  visual dissolve slowly
  show bkgnd button next
end closecard



-- part 2 (field)
-- low flags: 80
-- high flags: 0002
-- rect: left=6 top=6 right=157 bottom=157
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Tom1
----- HyperTalk script -----

on openfield
  if the optionKey is down then
    set lockscreen to true
    choose button tool
    get loc of target
    subtract 72 from item 2 of it
    subtract 72 from item 1 of it
    click at it
    domenu "Clear Button"
    choose field tool
    get loc of target
    click at it
    domenu "Clear Field"
    choose browse tool
    set lockscreen to false
  end if
  wait 10 ticks
  if the mouse is down then
    repeat until the mouse is up
      set the loc of the target to the mouseLoc
      get the loc of target
      subtract 72 from item 2 of it
      subtract 72 from item 1 of it
      set the loc of button Tom1 to it
    end repeat
  end if
end openfield


-- part 3 (button)
-- low flags: 00
-- high flags: 0002
-- rect: left=6 top=6 right=12 bottom=12
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Tom1
----- HyperTalk script -----
on mouseUp
  Set the visible of card field id 2 to not the visible of card field id 2
end mouseUp


-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=95 top=294 right=317 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 11045 / 11045
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: go home
----- HyperTalk script -----
on mouseUp
  go home
end mouseUp



-- part contents for card part 2
----- text -----

This sound is called 
"Dawn Chorus".  It is played twice and modified to taper off.
It's from a stack offered up by:
Mr. David Rakowski